┌────────────────────────────────┐ │ ░░░ ░░▓ ░▓▓ ███ ▓▓░ ▓░░ │ │ ~ M O O N ~ │ └────────────────────────────────┘
prd-web-01.centraldc.gr
LOCATION:
/usr/share/perl5/vendor_perl/Term/Size
☗ ROOT
↻ REFRESH
✎ EDIT FILE
EDITING: Any.pm
package Term::Size::Any; use strict; use vars qw( $VERSION ); $VERSION = '0.002'; sub _require_any { my $package; if ( $^O eq 'MSWin32' ) { require Term::Size::Win32; $package = 'Term::Size::Win32'; } else { #require Best; #my @modules = qw( Term::Size::Perl Term::Size Term::Size::ReadKey ); #Best->import( @modules ); #$package = Best->which( @modules ); require Term::Size::Perl; $package = 'Term::Size::Perl'; } $package->import( qw( chars pixels ) ); # allows Term::Size::Any::chars return $package; } sub import { my $self = shift; my $package = _require_any; unshift @_, $package; my $import_sub = $package->can('import'); goto &$import_sub; } 1;
CANCEL
Name
Type
Size
Modified
Actions
↩ ..
DIR
—
—
📁 Perl/
DIR
—
2026-04-06 11:01
📄 Any.pm
PM
771 B
2012-04-20 14:09
EDIT
📄 Any.pod
POD
2.6 KB
2012-04-20 14:08
EDIT
📄 Perl.pm
PM
2.3 KB
2018-02-14 19:03
EDIT